From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 28 May 1993 19:46:06 +0000 (+0000)
Subject: Fix up previous change.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~95846
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=540dde41b783dc4c15a74170cfd2bc8b1176620a;p=emacs.git

Fix up previous change.
---

diff --git a/lisp/paths.el b/lisp/paths.el
index 6f4975f3394..46ebbc6c6e1 100644
--- a/lisp/paths.el
+++ b/lisp/paths.el
@@ -33,10 +33,10 @@
 
 (defvar Info-default-directory-list
   (let ((start (list "/usr/local/info/"
-		     "/usr/local/lib/info/"
-		     configure-info-directory)))
-    (or (member configure-info-directory start)
-	(setq start (nconc start (list configure-info-directory))))
+		     "/usr/local/lib/info/"))
+	(configdir (file-name-as-directory configure-info-directory)))
+    (or (member configdir start)
+	(setq start (nconc start (list configdir))))
     (or (member (expand-file-name "../info/" data-directory) start)
 	(setq start
 	      (nconc start